home *** CD-ROM | disk | FTP | other *** search
/ Wonky Flux Batch 2019 02 / Wonky_Flux_Batch_2019-02.zip / Wonky Flux Batch 2019-02 / 115 - DD Deluxe 4.0.dsk / DDDELUXE.V5.0 / D.D.DELUXE.S1 / STARTUP.bas < prev    next >
BASIC Source File  |  2000-01-01  |  821b  |  13 lines

  1. 1  REM   DISK DISINTEGRATER DeLUXE BOOT DISK
  2. 2  REM   (C)LOGIX INNOVATIONS 1989<CTRL-J><CTRL-J><CTRL-J>
  3. 10  TEXT : HOME :D$ =  CHR$(4)
  4. 20  PRINT D$"FRE": PRINT D$"BLOAD STARTUP.CMD,TCMD,A$4000": CALL 16384
  5. 30  INVERSE : HTAB 6: PRINT "------------------------------"
  6. 40  HTAB 6: PRINT "DISK DISINTEGRATER DELUXE V5.0"
  7. 50  HTAB 6: PRINT "------------------------------"
  8. 100  NORMAL : VTAB 8: PRINT "CHOOSE:"
  9. 110  VTAB 11: HTAB 3: PRINT "[1] RUN D.D.DELUXE V5.0"
  10. 120  PRINT : HTAB 3: PRINT "[2] QUIT TO APPLESOFT BASIC"
  11. 130  VTAB 8: HTAB 8: GET A$: IF A$ < >"2"  THEN  PRINT D$"PREFIX /D.D.DELUXE.S1/DDDELUXE.V5.0": PRINT D$"-D.D.DELUXE.LOAD"
  12. 140  VTAB 8: HTAB 1: CALL  -958: PRINT "TO VIEW A TEXT FILE, ENTER:": PRINT : PRINT : HTAB 3: PRINT "]TYPE <FILENAME>"
  13. 150  PRINT : PRINT : PRINT : PRINT "HAVE FUN!!": PRINT : NEW